3.347 \(\int \frac {1}{\sqrt {1-c^2 x^2} (a+b \cosh ^{-1}(c x))^2} \, dx\)

Optimal. Leaf size=37 \[ -\frac {\sqrt {c x-1}}{b c \sqrt {1-c x} \left (a+b \cosh ^{-1}(c x)\right )} \]

[Out]

-(c*x-1)^(1/2)/b/c/(a+b*arccosh(c*x))/(-c*x+1)^(1/2)

________________________________________________________________________________________

Rubi [A]  time = 0.22, antiderivative size = 50, normalized size of antiderivative = 1.35, number of steps used = 2, number of rules used = 2, integrand size = 25, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.080, Rules used = {5713, 5676} \[ -\frac {\sqrt {c x-1} \sqrt {c x+1}}{b c \sqrt {1-c^2 x^2} \left (a+b \cosh ^{-1}(c x)\right )} \]

Antiderivative was successfully verified.

[In]

Int[1/(Sqrt[1 - c^2*x^2]*(a + b*ArcCosh[c*x])^2),x]

[Out]

-((Sqrt[-1 + c*x]*Sqrt[1 + c*x])/(b*c*Sqrt[1 - c^2*x^2]*(a + b*ArcCosh[c*x])))

Rule 5676

Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)/(Sqrt[(d1_) + (e1_.)*(x_)]*Sqrt[(d2_) + (e2_.)*(x_)]), x_Symbol]
:> Simp[(a + b*ArcCosh[c*x])^(n + 1)/(b*c*Sqrt[-(d1*d2)]*(n + 1)), x] /; FreeQ[{a, b, c, d1, e1, d2, e2, n},
x] && EqQ[e1, c*d1] && EqQ[e2, -(c*d2)] && GtQ[d1, 0] && LtQ[d2, 0] && NeQ[n, -1]

Rule 5713

Int[((a_.) + ArcCosh[(c_.)*(x_)]*(b_.))^(n_.)*((d_) + (e_.)*(x_)^2)^(p_), x_Symbol] :> Dist[((-d)^IntPart[p]*(
d + e*x^2)^FracPart[p])/((1 + c*x)^FracPart[p]*(-1 + c*x)^FracPart[p]), Int[(1 + c*x)^p*(-1 + c*x)^p*(a + b*Ar
cCosh[c*x])^n, x], x] /; FreeQ[{a, b, c, d, e, n, p}, x] && EqQ[c^2*d + e, 0] &&  !IntegerQ[p]

Rubi steps

\begin {align*} \int \frac {1}{\sqrt {1-c^2 x^2} \left (a+b \cosh ^{-1}(c x)\right )^2} \, dx &=\frac {\left (\sqrt {-1+c x} \sqrt {1+c x}\right ) \int \frac {1}{\sqrt {-1+c x} \sqrt {1+c x} \left (a+b \cosh ^{-1}(c x)\right )^2} \, dx}{\sqrt {1-c^2 x^2}}\\ &=-\frac {\sqrt {-1+c x} \sqrt {1+c x}}{b c \sqrt {1-c^2 x^2} \left (a+b \cosh ^{-1}(c x)\right )}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.03, size = 50, normalized size = 1.35 \[ -\frac {\sqrt {c x-1} \sqrt {c x+1}}{b c \sqrt {1-c^2 x^2} \left (a+b \cosh ^{-1}(c x)\right )} \]

Antiderivative was successfully verified.

[In]

Integrate[1/(Sqrt[1 - c^2*x^2]*(a + b*ArcCosh[c*x])^2),x]

[Out]

-((Sqrt[-1 + c*x]*Sqrt[1 + c*x])/(b*c*Sqrt[1 - c^2*x^2]*(a + b*ArcCosh[c*x])))

________________________________________________________________________________________

fricas [B]  time = 0.61, size = 75, normalized size = 2.03 \[ \frac {\sqrt {c^{2} x^{2} - 1} \sqrt {-c^{2} x^{2} + 1}}{a b c^{3} x^{2} - a b c + {\left (b^{2} c^{3} x^{2} - b^{2} c\right )} \log \left (c x + \sqrt {c^{2} x^{2} - 1}\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a+b*arccosh(c*x))^2/(-c^2*x^2+1)^(1/2),x, algorithm="fricas")

[Out]

sqrt(c^2*x^2 - 1)*sqrt(-c^2*x^2 + 1)/(a*b*c^3*x^2 - a*b*c + (b^2*c^3*x^2 - b^2*c)*log(c*x + sqrt(c^2*x^2 - 1))
)

________________________________________________________________________________________

giac [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int \frac {1}{\sqrt {-c^{2} x^{2} + 1} {\left (b \operatorname {arcosh}\left (c x\right ) + a\right )}^{2}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a+b*arccosh(c*x))^2/(-c^2*x^2+1)^(1/2),x, algorithm="giac")

[Out]

integrate(1/(sqrt(-c^2*x^2 + 1)*(b*arccosh(c*x) + a)^2), x)

________________________________________________________________________________________

maple [A]  time = 0.06, size = 57, normalized size = 1.54 \[ \frac {\sqrt {-\left (c x -1\right ) \left (c x +1\right )}\, \sqrt {c x -1}\, \sqrt {c x +1}}{c \left (c^{2} x^{2}-1\right ) \left (a +b \,\mathrm {arccosh}\left (c x \right )\right ) b} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(a+b*arccosh(c*x))^2/(-c^2*x^2+1)^(1/2),x)

[Out]

(-(c*x-1)*(c*x+1))^(1/2)*(c*x-1)^(1/2)*(c*x+1)^(1/2)/c/(c^2*x^2-1)/(a+b*arccosh(c*x))/b

________________________________________________________________________________________

maxima [F]  time = 0.00, size = 0, normalized size = 0.00 \[ -\frac {c^{3} x^{3} + {\left (c^{2} x^{2} - 1\right )} \sqrt {c x + 1} \sqrt {c x - 1} - c x}{{\left ({\left (c x + 1\right )} \sqrt {c x - 1} b^{2} c^{2} x + {\left (b^{2} c^{3} x^{2} - b^{2} c\right )} \sqrt {c x + 1}\right )} \sqrt {-c x + 1} \log \left (c x + \sqrt {c x + 1} \sqrt {c x - 1}\right ) + {\left ({\left (c x + 1\right )} \sqrt {c x - 1} a b c^{2} x + {\left (a b c^{3} x^{2} - a b c\right )} \sqrt {c x + 1}\right )} \sqrt {-c x + 1}} + \int -\frac {c^{2} x^{2} - {\left (c x + 1\right )} {\left (c x - 1\right )} - 1}{{\left ({\left (c x + 1\right )}^{\frac {3}{2}} {\left (c x - 1\right )} b^{2} c^{2} x^{2} + 2 \, {\left (b^{2} c^{3} x^{3} - b^{2} c x\right )} {\left (c x + 1\right )} \sqrt {c x - 1} + {\left (b^{2} c^{4} x^{4} - 2 \, b^{2} c^{2} x^{2} + b^{2}\right )} \sqrt {c x + 1}\right )} \sqrt {-c x + 1} \log \left (c x + \sqrt {c x + 1} \sqrt {c x - 1}\right ) + {\left ({\left (c x + 1\right )}^{\frac {3}{2}} {\left (c x - 1\right )} a b c^{2} x^{2} + 2 \, {\left (a b c^{3} x^{3} - a b c x\right )} {\left (c x + 1\right )} \sqrt {c x - 1} + {\left (a b c^{4} x^{4} - 2 \, a b c^{2} x^{2} + a b\right )} \sqrt {c x + 1}\right )} \sqrt {-c x + 1}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a+b*arccosh(c*x))^2/(-c^2*x^2+1)^(1/2),x, algorithm="maxima")

[Out]

-(c^3*x^3 + (c^2*x^2 - 1)*sqrt(c*x + 1)*sqrt(c*x - 1) - c*x)/(((c*x + 1)*sqrt(c*x - 1)*b^2*c^2*x + (b^2*c^3*x^
2 - b^2*c)*sqrt(c*x + 1))*sqrt(-c*x + 1)*log(c*x + sqrt(c*x + 1)*sqrt(c*x - 1)) + ((c*x + 1)*sqrt(c*x - 1)*a*b
*c^2*x + (a*b*c^3*x^2 - a*b*c)*sqrt(c*x + 1))*sqrt(-c*x + 1)) + integrate(-(c^2*x^2 - (c*x + 1)*(c*x - 1) - 1)
/(((c*x + 1)^(3/2)*(c*x - 1)*b^2*c^2*x^2 + 2*(b^2*c^3*x^3 - b^2*c*x)*(c*x + 1)*sqrt(c*x - 1) + (b^2*c^4*x^4 -
2*b^2*c^2*x^2 + b^2)*sqrt(c*x + 1))*sqrt(-c*x + 1)*log(c*x + sqrt(c*x + 1)*sqrt(c*x - 1)) + ((c*x + 1)^(3/2)*(
c*x - 1)*a*b*c^2*x^2 + 2*(a*b*c^3*x^3 - a*b*c*x)*(c*x + 1)*sqrt(c*x - 1) + (a*b*c^4*x^4 - 2*a*b*c^2*x^2 + a*b)
*sqrt(c*x + 1))*sqrt(-c*x + 1)), x)

________________________________________________________________________________________

mupad [B]  time = 0.45, size = 59, normalized size = 1.59 \[ -\frac {b\,\sqrt {1-c^2\,x^2}\,\sqrt {c\,x-1}\,\sqrt {c\,x+1}}{c\,\left (a+b\,\mathrm {acosh}\left (c\,x\right )\right )\,\left (b^2-b^2\,c^2\,x^2\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/((a + b*acosh(c*x))^2*(1 - c^2*x^2)^(1/2)),x)

[Out]

-(b*(1 - c^2*x^2)^(1/2)*(c*x - 1)^(1/2)*(c*x + 1)^(1/2))/(c*(a + b*acosh(c*x))*(b^2 - b^2*c^2*x^2))

________________________________________________________________________________________

sympy [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int \frac {1}{\sqrt {- \left (c x - 1\right ) \left (c x + 1\right )} \left (a + b \operatorname {acosh}{\left (c x \right )}\right )^{2}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(a+b*acosh(c*x))**2/(-c**2*x**2+1)**(1/2),x)

[Out]

Integral(1/(sqrt(-(c*x - 1)*(c*x + 1))*(a + b*acosh(c*x))**2), x)

________________________________________________________________________________________